/ Amiga Tools 2 / Amiga Tools 2.iso / tex / macros / contrib / antree.sty

< prev

next >

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 25 20 61 6e 74 72 65 65 | 2e 73 74 79 20 2d 2d 20 |% antree|.sty -- |
|00000010| 61 6e 6e 6f 74 61 74 65 | 64 20 6e 6f 64 65 20 74 |annotate|d node t|
|00000020| 72 65 65 73 0a 25 20 43 | 6f 70 79 72 69 67 68 74 |rees.% C|opyright|
|00000030| 20 31 39 39 34 20 2d 2d | 20 50 65 74 65 72 20 57 | 1994 --| Peter W|
|00000040| 69 6c 6c 69 61 6d 73 20 | 28 70 65 74 65 72 77 40 |illiams |(peterw@|
|00000050| 61 72 63 68 2e 73 75 2e | 65 64 75 2e 61 75 29 0a |arch.su.|edu.au).|
|00000060| 5c 4e 65 65 64 73 54 65 | 58 46 6f 72 6d 61 74 7b |\NeedsTe|XFormat{|
|00000070| 4c 61 54 65 58 32 65 7d | 0a 5c 50 72 6f 76 69 64 |LaTeX2e}|.\Provid|
|00000080| 65 73 50 61 63 6b 61 67 | 65 7b 61 6e 74 72 65 65 |esPackag|e{antree|
|00000090| 7d 5b 31 39 39 34 2f 30 | 36 2f 32 32 5d 0a 5c 52 |}[1994/0|6/22].\R|
|000000a0| 65 71 75 69 72 65 50 61 | 63 6b 61 67 65 7b 63 61 |equirePa|ckage{ca|
|000000b0| 6c 63 7d 0a 5c 52 65 71 | 75 69 72 65 50 61 63 6b |lc}.\Req|uirePack|
|000000c0| 61 67 65 7b 69 66 74 68 | 65 6e 7d 0a 5c 52 65 71 |age{ifth|en}.\Req|
|000000d0| 75 69 72 65 50 61 63 6b | 61 67 65 7b 65 70 69 63 |uirePack|age{epic|
|000000e0| 7d 0a 5c 52 65 71 75 69 | 72 65 50 61 63 6b 61 67 |}.\Requi|rePackag|
|000000f0| 65 7b 65 65 70 69 63 7d | 0a 5c 52 65 71 75 69 72 |e{eepic}|.\Requir|
|00000100| 65 50 61 63 6b 61 67 65 | 7b 74 6f 6b 6c 69 73 74 |ePackage|{toklist|
|00000110| 7d 0a 0a 5c 6e 65 77 6c | 65 6e 67 74 68 7b 5c 41 |}..\newl|ength{\A|
|00000120| 4e 68 73 70 61 63 65 7d | 0a 5c 73 65 74 6c 65 6e |Nhspace}|.\setlen|
|00000130| 67 74 68 7b 5c 41 4e 68 | 73 70 61 63 65 7d 7b 34 |gth{\ANh|space}{4|
|00000140| 70 74 7d 0a 5c 6e 65 77 | 6c 65 6e 67 74 68 7b 5c |pt}.\new|length{\|
|00000150| 41 4e 76 73 70 61 63 65 | 7d 0a 5c 73 65 74 6c 65 |ANvspace|}.\setle|
|00000160| 6e 67 74 68 7b 5c 41 4e | 76 73 70 61 63 65 7d 7b |ngth{\AN|vspace}{|
|00000170| 33 30 70 74 7d 0a 5c 6e | 65 77 6c 65 6e 67 74 68 |30pt}.\n|ewlength|
|00000180| 7b 5c 41 4e 65 73 65 70 | 7d 0a 5c 73 65 74 6c 65 |{\ANesep|}.\setle|
|00000190| 6e 67 74 68 7b 5c 41 4e | 65 73 65 70 7d 7b 31 32 |ngth{\AN|esep}{12|
|000001a0| 70 74 7d 0a 5c 6e 65 77 | 6c 65 6e 67 74 68 7b 5c |pt}.\new|length{\|
|000001b0| 41 4e 65 73 70 61 63 65 | 7d 0a 5c 73 65 74 6c 65 |ANespace|}.\setle|
|000001c0| 6e 67 74 68 7b 5c 41 4e | 65 73 70 61 63 65 7d 7b |ngth{\AN|espace}{|
|000001d0| 31 70 74 7d 0a 5c 6e 65 | 77 6c 65 6e 67 74 68 7b |1pt}.\ne|wlength{|
|000001e0| 5c 41 4e 40 65 68 73 70 | 7d 0a 5c 6e 65 77 6c 65 |\AN@ehsp|}.\newle|
|000001f0| 6e 67 74 68 7b 5c 41 4e | 40 65 76 73 70 7d 0a 5c |ngth{\AN|@evsp}.\|
|00000200| 6e 65 77 6c 65 6e 67 74 | 68 7b 5c 41 4e 40 61 7d |newlengt|h{\AN@a}|
|00000210| 0a 5c 6e 65 77 6c 65 6e | 67 74 68 7b 5c 41 4e 40 |.\newlen|gth{\AN@|
|00000220| 62 7d 0a 5c 6e 65 77 6c | 65 6e 67 74 68 7b 5c 41 |b}.\newl|ength{\A|
|00000230| 4e 40 63 7d 0a 5c 6e 65 | 77 6c 65 6e 67 74 68 7b |N@c}.\ne|wlength{|
|00000240| 5c 41 4e 40 73 74 77 7d | 0a 5c 6e 65 77 6c 65 6e |\AN@stw}|.\newlen|
|00000250| 67 74 68 7b 5c 41 4e 40 | 73 74 68 7d 0a 5c 6e 65 |gth{\AN@|sth}.\ne|
|00000260| 77 73 61 76 65 62 6f 78 | 7b 5c 6c 65 61 66 40 63 |wsavebox|{\leaf@c|
|00000270| 6f 6e 74 65 6e 74 7d 0a | 5c 6e 65 77 73 61 76 65 |ontent}.|\newsave|
|00000280| 62 6f 78 7b 5c 6c 69 6e | 6b 40 63 6f 6e 74 65 6e |box{\lin|k@conten|
|00000290| 74 7d 0a 5c 6e 65 77 73 | 61 76 65 62 6f 78 7b 5c |t}.\news|avebox{\|
|000002a0| 6c 69 6e 6b 40 6c 61 62 | 65 6c 7d 0a 5c 6e 65 77 |link@lab|el}.\new|
|000002b0| 73 61 76 65 62 6f 78 7b | 5c 6e 6f 64 65 40 63 6f |savebox{|\node@co|
|000002c0| 6e 74 65 6e 74 7d 0a 5c | 6e 65 77 62 6f 6f 6c 65 |ntent}.\|newboole|
|000002d0| 61 6e 7b 41 4e 40 66 69 | 72 73 74 6c 69 6e 6b 7d |an{AN@fi|rstlink}|
|000002e0| 0a 0a 5c 65 6e 64 6c 69 | 6e 65 63 68 61 72 3d 2d |..\endli|nechar=-|
|000002f0| 31 5c 72 65 6c 61 78 0a | 0a 7b 5c 63 61 74 63 6f |1\relax.|.{\catco|
|00000300| 64 65 60 5c 70 3d 31 32 | 20 5c 63 61 74 63 6f 64 |de`\p=12| \catcod|
|00000310| 65 60 5c 74 3d 31 32 0a | 5c 67 64 65 66 5c 41 4e |e`\t=12.|\gdef\AN|
|00000320| 40 72 6d 64 23 31 70 74 | 7b 23 31 7d 7d 0a 0a 5c |@rmd#1pt|{#1}}..\|
|00000330| 6e 65 77 65 6e 76 69 72 | 6f 6e 6d 65 6e 74 7b 61 |newenvir|onment{a|
|00000340| 6e 74 72 65 65 7d 5b 32 | 5d 5b 5c 6e 75 6c 6c 5d |ntree}[2|][\null]|
|00000350| 7b 25 0a 5c 6e 65 77 63 | 6f 6d 6d 61 6e 64 7b 5c |{%.\newc|ommand{\|
|00000360| 6c 65 61 66 7d 5b 32 5d | 5b 5c 6e 75 6c 6c 5d 7b |leaf}[2]|[\null]{|
|00000370| 25 0a 20 20 5c 73 62 6f | 78 7b 5c 6c 65 61 66 40 |%.  \sbo|x{\leaf@|
|00000380| 63 6f 6e 74 65 6e 74 7d | 7b 23 23 32 7d 0a 20 20 |content}|{##2}.  |
|00000390| 5c 73 65 74 74 6f 77 69 | 64 74 68 7b 5c 41 4e 40 |\settowi|dth{\AN@|
|000003a0| 61 7d 7b 5c 75 73 65 62 | 6f 78 7b 5c 6c 65 61 66 |a}{\useb|ox{\leaf|
|000003b0| 40 63 6f 6e 74 65 6e 74 | 7d 7d 25 0a 20 20 5c 73 |@content|}}%.  \s|
|000003c0| 65 74 74 6f 68 65 69 67 | 68 74 7b 5c 41 4e 40 62 |ettoheig|ht{\AN@b|
|000003d0| 7d 7b 5c 75 73 65 62 6f | 78 7b 5c 6c 65 61 66 40 |}{\usebo|x{\leaf@|
|000003e0| 63 6f 6e 74 65 6e 74 7d | 7d 25 0a 20 20 5c 73 65 |content}|}%.  \se|
|000003f0| 74 74 6f 64 65 70 74 68 | 7b 5c 41 4e 40 63 7d 7b |ttodepth|{\AN@c}{|
|00000400| 5c 75 73 65 62 6f 78 7b | 5c 6c 65 61 66 40 63 6f |\usebox{|\leaf@co|
|00000410| 6e 74 65 6e 74 7d 7d 25 | 0a 20 20 5c 61 64 64 74 |ntent}}%|.  \addt|
|00000420| 6f 6c 65 6e 67 74 68 7b | 5c 41 4e 40 62 7d 7b 5c |olength{|\AN@b}{\|
|00000430| 41 4e 40 63 7d 25 0a 20 | 20 5c 62 65 67 69 6e 7b |AN@c}%. | \begin{|
|00000440| 70 69 63 74 75 72 65 7d | 28 5c 41 4e 40 58 70 6f |picture}|(\AN@Xpo|
|00000450| 73 2c 5c 41 4e 40 59 70 | 6f 73 29 25 0a 20 20 20 |s,\AN@Yp|os)%.   |
|00000460| 20 5c 73 65 74 74 6f 64 | 65 70 74 68 7b 5c 41 4e | \settod|epth{\AN|
|00000470| 40 63 7d 7b 5c 75 73 65 | 62 6f 78 7b 5c 6c 65 61 |@c}{\use|box{\lea|
|00000480| 66 40 63 6f 6e 74 65 6e | 74 7d 7d 25 0a 20 20 20 |f@conten|t}}%.   |
|00000490| 20 5c 70 75 74 28 30 2c | 5c 41 4e 40 5a 70 6f 73 | \put(0,|\AN@Zpos|
|000004a0| 29 7b 5c 75 73 65 62 6f | 78 7b 5c 6c 65 61 66 40 |){\usebo|x{\leaf@|
|000004b0| 63 6f 6e 74 65 6e 74 7d | 7d 25 0a 20 20 20 20 5c |content}|}%.    \|
|000004c0| 70 75 74 28 5c 41 4e 40 | 58 70 6f 73 2c 5c 41 4e |put(\AN@|Xpos,\AN|
|000004d0| 40 59 70 6f 73 29 7b 23 | 23 31 7d 25 0a 20 20 5c |@Ypos){#|#1}%.  \|
|000004e0| 65 6e 64 7b 70 69 63 74 | 75 72 65 7d 25 7d 25 7d |end{pict|ure}%}%}|
|000004f0| 0a 20 20 5c 69 67 6e 6f | 72 65 73 70 61 63 65 73 |.  \igno|respaces|
|00000500| 25 0a 7d 25 0a 25 0a 5c | 6e 65 77 63 6f 6d 6d 61 |%.}%.%.\|newcomma|
|00000510| 6e 64 7b 5c 6c 69 6e 6b | 7d 5b 32 5d 5b 5c 6e 75 |nd{\link|}[2][\nu|
|00000520| 6c 6c 5d 7b 25 0a 20 20 | 5c 54 4f 4b 4c 40 61 70 |ll]{%.  |\TOKL@ap|
|00000530| 70 65 6e 64 23 23 31 5c | 74 6f 5c 41 4e 40 69 6e |pend##1\|to\AN@in|
|00000540| 64 69 63 65 73 25 0a 20 | 20 5c 73 62 6f 78 7b 5c |dices%. | \sbox{\|
|00000550| 6c 69 6e 6b 40 63 6f 6e | 74 65 6e 74 7d 7b 23 23 |link@con|tent}{##|
|00000560| 32 7d 0a 20 20 5c 73 65 | 74 74 6f 77 69 64 74 68 |2}.  \se|ttowidth|
|00000570| 7b 5c 41 4e 40 61 7d 7b | 5c 75 73 65 62 6f 78 7b |{\AN@a}{|\usebox{|
|00000580| 5c 6c 69 6e 6b 40 63 6f | 6e 74 65 6e 74 7d 7d 25 |\link@co|ntent}}%|
|00000590| 0a 20 20 5c 61 64 64 74 | 6f 6c 65 6e 67 74 68 7b |.  \addt|olength{|
|000005a0| 5c 41 4e 40 73 74 77 7d | 7b 30 2e 35 5c 41 4e 40 |\AN@stw}|{0.5\AN@|
|000005b0| 61 7d 25 0a 20 20 5c 69 | 66 74 68 65 6e 65 6c 73 |a}%.  \i|fthenels|
|000005c0| 65 7b 5c 62 6f 6f 6c 65 | 61 6e 7b 41 4e 40 66 69 |e{\boole|an{AN@fi|
|000005d0| 72 73 74 6c 69 6e 6b 7d | 7d 25 0a 20 20 20 20 7b |rstlink}|}%.    {|
|000005e0| 5c 73 65 74 62 6f 6f 6c | 65 61 6e 7b 41 4e 40 66 |\setbool|ean{AN@f|
|000005f0| 69 72 73 74 6c 69 6e 6b | 7d 7b 66 61 6c 73 65 7d |irstlink|}{false}|
|00000600| 7d 25 0a 20 20 20 20 7b | 5c 68 73 70 61 63 65 2a |}%.    {|\hspace*|
|00000610| 7b 5c 41 4e 68 73 70 61 | 63 65 7d 5c 61 64 64 74 |{\ANhspa|ce}\addt|
|00000620| 6f 6c 65 6e 67 74 68 7b | 5c 41 4e 40 73 74 77 7d |olength{|\AN@stw}|
|00000630| 7b 5c 41 4e 68 73 70 61 | 63 65 7d 7d 25 0a 20 20 |{\ANhspa|ce}}%.  |
|00000640| 5c 54 4f 4b 4c 40 61 70 | 70 65 6e 64 76 5c 65 78 |\TOKL@ap|pendv\ex|
|00000650| 70 61 6e 64 61 66 74 65 | 72 5c 41 4e 40 72 6d 64 |pandafte|r\AN@rmd|
|00000660| 5c 74 68 65 5c 41 4e 40 | 73 74 77 5c 74 6f 5c 41 |\the\AN@|stw\to\A|
|00000670| 4e 40 78 6c 69 73 74 25 | 0a 20 20 5c 61 64 64 74 |N@xlist%|.  \addt|
|00000680| 6f 6c 65 6e 67 74 68 7b | 5c 41 4e 40 73 74 77 7d |olength{|\AN@stw}|
|00000690| 7b 30 2e 35 5c 41 4e 40 | 61 7d 25 0a 20 20 5c 73 |{0.5\AN@|a}%.  \s|
|000006a0| 65 74 74 6f 68 65 69 67 | 68 74 7b 5c 41 4e 40 62 |ettoheig|ht{\AN@b|
|000006b0| 7d 7b 5c 75 73 65 62 6f | 78 7b 5c 6c 69 6e 6b 40 |}{\usebo|x{\link@|
|000006c0| 63 6f 6e 74 65 6e 74 7d | 7d 0a 20 20 5c 73 65 74 |content}|}.  \set|
|000006d0| 74 6f 64 65 70 74 68 7b | 5c 41 4e 40 63 7d 7b 5c |todepth{|\AN@c}{\|
|000006e0| 75 73 65 62 6f 78 7b 5c | 6c 69 6e 6b 40 63 6f 6e |usebox{\|link@con|
|000006f0| 74 65 6e 74 7d 7d 0a 20 | 20 5c 72 61 69 73 65 62 |tent}}. | \raiseb|
|00000700| 6f 78 7b 30 70 74 7d 7b | 5c 76 74 6f 70 7b 5c 6e |ox{0pt}{|\vtop{\n|
|00000710| 75 6c 6c 5c 68 62 6f 78 | 7b 5c 75 73 65 62 6f 78 |ull\hbox|{\usebox|
|00000720| 7b 5c 6c 69 6e 6b 40 63 | 6f 6e 74 65 6e 74 7d 7d |{\link@c|ontent}}|
|00000730| 7d 7d 0a 20 20 5c 69 67 | 6e 6f 72 65 73 70 61 63 |}}.  \ig|norespac|
|00000740| 65 73 25 0a 7d 25 0a 25 | 0a 5c 64 65 66 5c 41 4e |es%.}%.%|.\def\AN|
|00000750| 40 58 70 6f 73 7b 5c 65 | 78 70 61 6e 64 61 66 74 |@Xpos{\e|xpandaft|
|00000760| 65 72 5c 41 4e 40 72 6d | 64 5c 74 68 65 5c 41 4e |er\AN@rm|d\the\AN|
|00000770| 40 61 7d 25 0a 5c 64 65 | 66 5c 41 4e 40 59 70 6f |@a}%.\de|f\AN@Ypo|
|00000780| 73 7b 5c 65 78 70 61 6e | 64 61 66 74 65 72 5c 41 |s{\expan|dafter\A|
|00000790| 4e 40 72 6d 64 5c 74 68 | 65 5c 41 4e 40 62 7d 25 |N@rmd\th|e\AN@b}%|
|000007a0| 0a 5c 64 65 66 5c 41 4e | 40 5a 70 6f 73 7b 5c 65 |.\def\AN|@Zpos{\e|
|000007b0| 78 70 61 6e 64 61 66 74 | 65 72 5c 41 4e 40 72 6d |xpandaft|er\AN@rm|
|000007c0| 64 5c 74 68 65 5c 41 4e | 40 63 7d 25 0a 25 0a 5c |d\the\AN|@c}%.%.\|
|000007d0| 6e 65 77 65 6e 76 69 72 | 6f 6e 6d 65 6e 74 7b 6e |newenvir|onment{n|
|000007e0| 6f 64 65 7d 5b 32 5d 5b | 5c 6e 75 6c 6c 5d 7b 25 |ode}[2][|\null]{%|
|000007f0| 0a 20 20 5c 6c 65 61 76 | 65 76 6d 6f 64 65 5c 68 |.  \leav|evmode\h|
|00000800| 62 6f 78 5c 62 67 72 6f | 75 70 25 0a 20 20 5c 65 |box\bgro|up%.  \e|
|00000810| 6e 64 6c 69 6e 65 63 68 | 61 72 3d 2d 31 0a 20 20 |ndlinech|ar=-1.  |
|00000820| 5c 73 62 6f 78 7b 5c 6e | 6f 64 65 40 63 6f 6e 74 |\sbox{\n|ode@cont|
|00000830| 65 6e 74 7d 7b 5c 6c 65 | 61 66 5b 23 23 31 5d 7b |ent}{\le|af[##1]{|
|00000840| 23 23 32 7d 7d 0a 20 20 | 5c 64 65 66 5c 41 4e 40 |##2}}.  |\def\AN@|
|00000850| 78 6c 69 73 74 7b 7d 25 | 0a 20 20 5c 64 65 66 5c |xlist{}%|.  \def\|
|00000860| 41 4e 40 69 6e 64 69 63 | 65 73 7b 7d 25 0a 20 20 |AN@indic|es{}%.  |
|00000870| 5c 73 65 74 6c 65 6e 67 | 74 68 7b 5c 75 6e 69 74 |\setleng|th{\unit|
|00000880| 6c 65 6e 67 74 68 7d 7b | 5c 70 40 7d 25 0a 20 20 |length}{|\p@}%.  |
|00000890| 5c 73 65 74 6c 65 6e 67 | 74 68 7b 5c 41 4e 40 73 |\setleng|th{\AN@s|
|000008a0| 74 77 7d 7b 5c 7a 40 7d | 25 0a 20 20 5c 73 65 74 |tw}{\z@}|%.  \set|
|000008b0| 6c 65 6e 67 74 68 7b 5c | 41 4e 40 73 74 68 7d 7b |length{\|AN@sth}{|
|000008c0| 5c 7a 40 7d 25 0a 20 20 | 5c 73 65 74 62 6f 6f 6c |\z@}%.  |\setbool|
|000008d0| 65 61 6e 7b 41 4e 40 66 | 69 72 73 74 6c 69 6e 6b |ean{AN@f|irstlink|
|000008e0| 7d 7b 74 72 75 65 7d 0a | 20 20 5c 69 67 6e 6f 72 |}{true}.|  \ignor|
|000008f0| 65 73 70 61 63 65 73 25 | 0a 7d 7b 5c 69 67 6e 6f |espaces%|.}{\igno|
|00000900| 72 65 73 70 61 63 65 73 | 25 0a 20 20 5c 73 65 74 |respaces|%.  \set|
|00000910| 6c 65 6e 67 74 68 7b 5c | 41 4e 40 73 74 68 7d 7b |length{\|AN@sth}{|
|00000920| 5c 41 4e 76 73 70 61 63 | 65 7d 25 0a 20 20 5c 73 |\ANvspac|e}%.  \s|
|00000930| 65 74 74 6f 68 65 69 67 | 68 74 7b 5c 41 4e 40 61 |ettoheig|ht{\AN@a|
|00000940| 7d 7b 5c 75 73 65 62 6f | 78 7b 5c 6e 6f 64 65 40 |}{\usebo|x{\node@|
|00000950| 63 6f 6e 74 65 6e 74 7d | 7d 25 0a 20 20 5c 61 64 |content}|}%.  \ad|
|00000960| 64 74 6f 6c 65 6e 67 74 | 68 7b 5c 41 4e 40 73 74 |dtolengt|h{\AN@st|
|00000970| 68 7d 7b 5c 41 4e 40 61 | 7d 25 0a 20 20 5c 73 65 |h}{\AN@a|}%.  \se|
|00000980| 74 74 6f 64 65 70 74 68 | 7b 5c 41 4e 40 61 7d 7b |ttodepth|{\AN@a}{|
|00000990| 5c 75 73 65 62 6f 78 7b | 5c 6e 6f 64 65 40 63 6f |\usebox{|\node@co|
|000009a0| 6e 74 65 6e 74 7d 7d 25 | 0a 20 20 5c 61 64 64 74 |ntent}}%|.  \addt|
|000009b0| 6f 6c 65 6e 67 74 68 7b | 5c 41 4e 40 73 74 68 7d |olength{|\AN@sth}|
|000009c0| 7b 5c 41 4e 40 61 7d 25 | 0a 20 20 5c 68 73 70 61 |{\AN@a}%|.  \hspa|
|000009d0| 63 65 2a 7b 2d 5c 41 4e | 40 73 74 77 7d 25 0a 20 |ce*{-\AN|@stw}%. |
|000009e0| 20 5c 73 65 74 6c 65 6e | 67 74 68 7b 5c 41 4e 40 | \setlen|gth{\AN@|
|000009f0| 61 7d 7b 30 2e 35 5c 41 | 4e 40 73 74 77 7d 25 0a |a}{0.5\A|N@stw}%.|
|00000a00| 20 20 5c 65 64 65 66 5c | 41 4e 40 6e 6f 64 65 78 |  \edef\|AN@nodex|
|00000a10| 7b 5c 65 78 70 61 6e 64 | 61 66 74 65 72 5c 41 4e |{\expand|after\AN|
|00000a20| 40 72 6d 64 5c 74 68 65 | 5c 41 4e 40 61 7d 25 0a |@rmd\the|\AN@a}%.|
|00000a30| 20 20 5c 65 64 65 66 5c | 41 4e 40 6e 6f 64 65 79 |  \edef\|AN@nodey|
|00000a40| 7b 5c 65 78 70 61 6e 64 | 61 66 74 65 72 5c 41 4e |{\expand|after\AN|
|00000a50| 40 72 6d 64 5c 74 68 65 | 5c 41 4e 76 73 70 61 63 |@rmd\the|\ANvspac|
|00000a60| 65 7d 25 0a 20 20 5c 65 | 64 65 66 5c 41 4e 40 70 |e}%.  \e|def\AN@p|
|00000a70| 69 63 78 7b 5c 65 78 70 | 61 6e 64 61 66 74 65 72 |icx{\exp|andafter|
|00000a80| 5c 41 4e 40 72 6d 64 5c | 74 68 65 5c 41 4e 40 73 |\AN@rmd\|the\AN@s|
|00000a90| 74 77 7d 25 0a 20 20 5c | 65 64 65 66 5c 41 4e 40 |tw}%.  \|edef\AN@|
|00000aa0| 70 69 63 79 7b 5c 65 78 | 70 61 6e 64 61 66 74 65 |picy{\ex|pandafte|
|00000ab0| 72 5c 41 4e 40 72 6d 64 | 5c 74 68 65 5c 41 4e 40 |r\AN@rmd|\the\AN@|
|00000ac0| 73 74 68 7d 25 0a 20 20 | 5c 62 65 67 69 6e 7b 70 |sth}%.  |\begin{p|
|00000ad0| 69 63 74 75 72 65 7d 28 | 5c 41 4e 40 70 69 63 78 |icture}(|\AN@picx|
|00000ae0| 2c 5c 41 4e 40 70 69 63 | 79 29 25 0a 20 20 20 20 |,\AN@pic|y)%.    |
|00000af0| 5c 77 68 69 6c 65 64 6f | 7b 5c 65 71 75 61 6c 7b |\whiledo|{\equal{|
|00000b00| 5c 54 4f 4b 40 65 6d 70 | 74 79 5c 41 4e 40 78 6c |\TOK@emp|ty\AN@xl|
|00000b10| 69 73 74 7d 7b 66 61 6c | 73 65 7d 7d 7b 25 0a 20 |ist}{fal|se}}{%. |
|00000b20| 20 20 20 20 20 5c 54 4f | 4b 4c 40 6c 6f 70 5c 41 |     \TO|KL@lop\A|
|00000b30| 4e 40 78 6c 69 73 74 5c | 74 6f 5c 41 4e 40 78 0a |N@xlist\|to\AN@x.|
|00000b40| 20 20 20 20 20 20 5c 54 | 4f 4b 4c 40 6c 6f 70 5c |      \T|OKL@lop\|
|00000b50| 41 4e 40 69 6e 64 69 63 | 65 73 5c 74 6f 5c 41 4e |AN@indic|es\to\AN|
|00000b60| 40 65 6c 61 62 65 6c 0a | 20 20 20 20 20 20 5c 73 |@elabel.|      \s|
|00000b70| 65 74 74 6f 77 69 64 74 | 68 7b 5c 41 4e 40 65 68 |ettowidt|h{\AN@eh|
|00000b80| 73 70 7d 7b 5c 41 4e 40 | 65 6c 61 62 65 6c 7d 25 |sp}{\AN@|elabel}%|
|00000b90| 0a 20 20 20 20 20 20 5c | 73 65 74 6c 65 6e 67 74 |.      \|setlengt|
|00000ba0| 68 7b 5c 41 4e 40 65 68 | 73 70 7d 7b 30 2e 35 5c |h{\AN@eh|sp}{0.5\|
|00000bb0| 41 4e 40 65 68 73 70 2b | 5c 41 4e 65 73 70 61 63 |AN@ehsp+|\ANespac|
|00000bc0| 65 7d 25 0a 20 20 20 20 | 20 20 5c 73 65 74 74 6f |e}%.    |  \setto|
|00000bd0| 68 65 69 67 68 74 7b 5c | 41 4e 40 65 76 73 70 7d |height{\|AN@evsp}|
|00000be0| 7b 5c 41 4e 40 65 6c 61 | 62 65 6c 7d 25 0a 20 20 |{\AN@ela|bel}%.  |
|00000bf0| 20 20 20 20 5c 73 65 74 | 6c 65 6e 67 74 68 7b 5c |    \set|length{\|
|00000c00| 41 4e 40 65 76 73 70 7d | 7b 30 2e 35 5c 41 4e 40 |AN@evsp}|{0.5\AN@|
|00000c10| 65 76 73 70 2b 5c 41 4e | 65 73 70 61 63 65 7d 25 |evsp+\AN|espace}%|
|00000c20| 0a 20 20 20 20 20 20 5c | 69 66 74 68 65 6e 65 6c |.      \|ifthenel|
|00000c30| 73 65 7b 5c 65 71 75 61 | 6c 7b 5c 41 4e 40 65 6c |se{\equa|l{\AN@el|
|00000c40| 61 62 65 6c 7d 7b 5c 6e | 75 6c 6c 7d 7d 7b 25 0a |abel}{\n|ull}}{%.|
|00000c50| 20 20 20 20 20 20 20 20 | 5c 64 72 61 77 6c 69 6e |        |\drawlin|
|00000c60| 65 28 5c 41 4e 40 6e 6f | 64 65 78 2c 5c 41 4e 40 |e(\AN@no|dex,\AN@|
|00000c70| 6e 6f 64 65 79 29 28 5c | 41 4e 40 78 2c 30 29 25 |nodey)(\|AN@x,0)%|
|00000c80| 0a 20 20 20 20 20 20 7d | 7b 25 0a 20 20 20 20 20 |.      }|{%.     |
|00000c90| 20 20 20 5c 69 66 74 68 | 65 6e 65 6c 73 65 7b 5c |   \ifth|enelse{\|
|00000ca0| 6c 65 6e 67 74 68 74 65 | 73 74 7b 5c 41 4e 65 73 |lengthte|st{\ANes|
|00000cb0| 65 70 3c 5c 41 4e 40 65 | 76 73 70 7d 7d 7b 25 0a |ep<\AN@e|vsp}}{%.|
|00000cc0| 20 20 20 20 20 20 20 20 | 20 20 5c 73 65 74 6c 65 |        |  \setle|
|00000cd0| 6e 67 74 68 7b 5c 41 4e | 40 62 7d 7b 32 5c 41 4e |ngth{\AN|@b}{2\AN|
|00000ce0| 40 65 76 73 70 7d 25 0a | 20 20 20 20 20 20 20 20 |@evsp}%.|        |
|00000cf0| 20 20 5c 64 72 61 77 6c | 69 6e 65 28 5c 41 4e 40 |  \drawl|ine(\AN@|
|00000d00| 6e 6f 64 65 78 2c 5c 41 | 4e 40 6e 6f 64 65 79 29 |nodex,\A|N@nodey)|
|00000d10| 28 5c 41 4e 40 78 2c 5c | 41 4e 40 59 70 6f 73 29 |(\AN@x,\|AN@Ypos)|
|00000d20| 25 0a 20 20 20 20 20 20 | 20 20 20 20 5c 70 75 74 |%.      |    \put|
|00000d30| 28 5c 41 4e 40 78 2c 5c | 41 4e 40 65 76 73 70 29 |(\AN@x,\|AN@evsp)|
|00000d40| 7b 5c 6d 61 6b 65 62 6f | 78 28 30 2c 30 29 7b 5c |{\makebo|x(0,0){\|
|00000d50| 41 4e 40 65 6c 61 62 65 | 6c 7d 7d 25 0a 20 20 20 |AN@elabe|l}}%.   |
|00000d60| 20 20 20 20 20 7d 7b 25 | 0a 20 20 20 20 20 20 20 |     }{%|.       |
|00000d70| 20 20 20 5c 69 66 74 68 | 65 6e 65 6c 73 65 7b 5c |   \ifth|enelse{\|
|00000d80| 6c 65 6e 67 74 68 74 65 | 73 74 7b 5c 41 4e 40 78 |lengthte|st{\AN@x|
|00000d90| 5c 70 40 3d 5c 41 4e 40 | 6e 6f 64 65 78 5c 70 40 |\p@=\AN@|nodex\p@|
|00000da0| 7d 7d 7b 25 0a 20 20 20 | 20 20 20 20 20 20 20 20 |}}{%.   |        |
|00000db0| 20 5c 73 65 74 6c 65 6e | 67 74 68 7b 5c 41 4e 40 | \setlen|gth{\AN@|
|00000dc0| 62 7d 7b 5c 41 4e 65 73 | 65 70 2d 5c 41 4e 40 65 |b}{\ANes|ep-\AN@e|
|00000dd0| 76 73 70 7d 25 0a 20 20 | 20 20 20 20 20 20 20 20 |vsp}%.  |        |
|00000de0| 20 20 5c 64 72 61 77 6c | 69 6e 65 28 5c 41 4e 40 |  \drawl|ine(\AN@|
|00000df0| 78 2c 5c 41 4e 40 59 70 | 6f 73 29 28 5c 41 4e 40 |x,\AN@Yp|os)(\AN@|
|00000e00| 78 2c 30 29 25 0a 20 20 | 20 20 20 20 20 20 20 20 |x,0)%.  |        |
|00000e10| 20 20 5c 73 65 74 6c 65 | 6e 67 74 68 7b 5c 41 4e |  \setle|ngth{\AN|
|00000e20| 40 62 7d 7b 5c 41 4e 65 | 73 65 70 2b 5c 41 4e 40 |@b}{\ANe|sep+\AN@|
|00000e30| 65 76 73 70 7d 25 0a 20 | 20 20 20 20 20 20 20 20 |evsp}%. |        |
|00000e40| 20 20 20 5c 64 72 61 77 | 6c 69 6e 65 28 5c 41 4e |   \draw|line(\AN|
|00000e50| 40 6e 6f 64 65 78 2c 5c | 41 4e 40 6e 6f 64 65 79 |@nodex,\|AN@nodey|
|00000e60| 29 28 5c 41 4e 40 78 2c | 5c 41 4e 40 59 70 6f 73 |)(\AN@x,|\AN@Ypos|
|00000e70| 29 25 0a 20 20 20 20 20 | 20 20 20 20 20 20 20 5c |)%.     |       \|
|00000e80| 73 65 74 6c 65 6e 67 74 | 68 7b 5c 41 4e 40 61 7d |setlengt|h{\AN@a}|
|00000e90| 7b 5c 41 4e 40 78 5c 70 | 40 7d 25 0a 20 20 20 20 |{\AN@x\p|@}%.    |
|00000ea0| 20 20 20 20 20 20 7d 7b | 25 0a 20 20 20 20 20 20 |      }{|%.      |
|00000eb0| 20 20 20 20 20 20 5c 73 | 65 74 6c 65 6e 67 74 68 |      \s|etlength|
|00000ec0| 7b 5c 41 4e 40 63 7d 7b | 31 30 30 70 74 2a 5c 72 |{\AN@c}{|100pt*\r|
|00000ed0| 61 74 69 6f 7b 5c 41 4e | 40 65 68 73 70 7d 7b 5c |atio{\AN|@ehsp}{\|
|00000ee0| 41 4e 40 65 76 73 70 7d | 7d 25 0a 20 20 20 20 20 |AN@evsp}|}%.     |
|00000ef0| 20 20 20 20 20 20 20 5c | 69 66 74 68 65 6e 65 6c |       \|ifthenel|
|00000f00| 73 65 7b 5c 6c 65 6e 67 | 74 68 74 65 73 74 7b 5c |se{\leng|thtest{\|
|00000f10| 41 4e 40 78 5c 70 40 20 | 3e 20 5c 41 4e 40 6e 6f |AN@x\p@ |> \AN@no|
|00000f20| 64 65 78 5c 70 40 7d 7d | 7b 25 0a 20 20 20 20 20 |dex\p@}}|{%.     |
|00000f30| 20 20 20 20 20 20 20 20 | 20 5c 73 65 74 6c 65 6e |        | \setlen|
|00000f40| 67 74 68 7b 5c 41 4e 40 | 61 7d 7b 31 30 30 70 74 |gth{\AN@|a}{100pt|
|00000f50| 2a 5c 72 61 74 69 6f 7b | 5c 41 4e 40 78 5c 70 40 |*\ratio{|\AN@x\p@|
|00000f60| 2d 5c 41 4e 40 6e 6f 64 | 65 78 5c 70 40 7d 7b 5c |-\AN@nod|ex\p@}{\|
|00000f70| 41 4e 40 6e 6f 64 65 79 | 5c 70 40 7d 7d 25 0a 20 |AN@nodey|\p@}}%. |
|00000f80| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 5c 69 66 |        |     \if|
|00000f90| 74 68 65 6e 65 6c 73 65 | 7b 5c 6c 65 6e 67 74 68 |thenelse|{\length|
|00000fa0| 74 65 73 74 7b 5c 41 4e | 40 61 20 3c 20 5c 41 4e |test{\AN|@a < \AN|
|00000fb0| 40 63 7d 7d 7b 25 0a 20 | 20 20 20 20 20 20 20 20 |@c}}{%. |        |
|00000fc0| 20 20 20 20 20 20 20 5c | 73 65 74 6c 65 6e 67 74 |       \|setlengt|
|00000fd0| 68 7b 5c 41 4e 40 62 7d | 7b 5c 41 4e 65 73 65 70 |h{\AN@b}|{\ANesep|
|00000fe0| 2d 5c 41 4e 40 65 76 73 | 70 7d 25 0a 20 20 20 20 |-\AN@evs|p}%.    |
|00000ff0| 20 20 20 20 20 20 20 20 | 20 20 20 20 5c 73 65 74 |        |    \set|
|00001000| 6c 65 6e 67 74 68 7b 5c | 41 4e 40 61 7d 7b 5c 41 |length{\|AN@a}{\A|
|00001010| 4e 40 78 5c 70 40 2d 5c | 41 4e 40 62 2a 5c 72 61 |N@x\p@-\|AN@b*\ra|
|00001020| 74 69 6f 7b 5c 41 4e 40 | 78 5c 70 40 2d 5c 41 4e |tio{\AN@|x\p@-\AN|
|00001030| 40 6e 6f 64 65 78 5c 70 | 40 7d 7b 5c 41 4e 40 6e |@nodex\p|@}{\AN@n|
|00001040| 6f 64 65 79 5c 70 40 7d | 7d 25 0a 20 20 20 20 20 |odey\p@}|}%.     |
|00001050| 20 20 20 20 20 20 20 20 | 20 20 20 5c 64 72 61 77 |        |   \draw|
|00001060| 6c 69 6e 65 28 5c 41 4e | 40 58 70 6f 73 2c 5c 41 |line(\AN|@Xpos,\A|
|00001070| 4e 40 59 70 6f 73 29 28 | 5c 41 4e 40 78 2c 30 29 |N@Ypos)(|\AN@x,0)|
|00001080| 25 0a 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |%.      |        |
|00001090| 20 20 5c 73 65 74 6c 65 | 6e 67 74 68 7b 5c 41 4e |  \setle|ngth{\AN|
|000010a0| 40 62 7d 7b 5c 41 4e 65 | 73 65 70 2b 5c 41 4e 40 |@b}{\ANe|sep+\AN@|
|000010b0| 65 76 73 70 7d 25 0a 20 | 20 20 20 20 20 20 20 20 |evsp}%. |        |
|000010c0| 20 20 20 20 20 20 20 5c | 73 65 74 6c 65 6e 67 74 |       \|setlengt|
|000010d0| 68 7b 5c 41 4e 40 61 7d | 7b 5c 41 4e 40 78 5c 70 |h{\AN@a}|{\AN@x\p|
|000010e0| 40 2d 5c 41 4e 40 62 2a | 5c 72 61 74 69 6f 7b 5c |@-\AN@b*|\ratio{\|
|000010f0| 41 4e 40 78 5c 70 40 2d | 5c 41 4e 40 6e 6f 64 65 |AN@x\p@-|\AN@node|
|00001100| 78 5c 70 40 7d 7b 5c 41 | 4e 40 6e 6f 64 65 79 5c |x\p@}{\A|N@nodey\|
|00001110| 70 40 7d 7d 25 0a 20 20 | 20 20 20 20 20 20 20 20 |p@}}%.  |        |
|00001120| 20 20 20 20 20 20 5c 64 | 72 61 77 6c 69 6e 65 28 |      \d|rawline(|
|00001130| 5c 41 4e 40 58 70 6f 73 | 2c 5c 41 4e 40 59 70 6f |\AN@Xpos|,\AN@Ypo|
|00001140| 73 29 28 5c 41 4e 40 6e | 6f 64 65 78 2c 5c 41 4e |s)(\AN@n|odex,\AN|
|00001150| 40 6e 6f 64 65 79 29 25 | 0a 20 20 20 20 20 20 20 |@nodey)%|.       |
|00001160| 20 20 20 20 20 20 20 7d | 7b 25 0a 20 20 20 20 20 |       }|{%.     |
|00001170| 20 20 20 20 20 20 20 20 | 20 20 20 5c 73 65 74 6c |        |   \setl|
|00001180| 65 6e 67 74 68 7b 5c 41 | 4e 40 61 7d 7b 5c 41 4e |ength{\A|N@a}{\AN|
|00001190| 65 73 65 70 2a 5c 72 61 | 74 69 6f 7b 5c 41 4e 40 |esep*\ra|tio{\AN@|
|000011a0| 78 5c 70 40 2d 5c 41 4e | 40 6e 6f 64 65 78 5c 70 |x\p@-\AN|@nodex\p|
|000011b0| 40 7d 7b 5c 41 4e 40 6e | 6f 64 65 79 5c 70 40 7d |@}{\AN@n|odey\p@}|
|000011c0| 2d 28 5c 41 4e 40 65 68 | 73 70 29 7d 25 0a 20 20 |-(\AN@eh|sp)}%.  |
|000011d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 5c 73 |        |      \s|
|000011e0| 65 74 6c 65 6e 67 74 68 | 7b 5c 41 4e 40 62 7d 7b |etlength|{\AN@b}{|
|000011f0| 5c 41 4e 40 61 2a 5c 72 | 61 74 69 6f 7b 5c 41 4e |\AN@a*\r|atio{\AN|
|00001200| 40 6e 6f 64 65 79 5c 70 | 40 7d 7b 5c 41 4e 40 78 |@nodey\p|@}{\AN@x|
|00001210| 5c 70 40 2d 5c 41 4e 40 | 6e 6f 64 65 78 5c 70 40 |\p@-\AN@|nodex\p@|
|00001220| 7d 7d 25 0a 20 20 20 20 | 20 20 20 20 20 20 20 20 |}}%.    |        |
|00001230| 20 20 20 20 5c 73 65 74 | 6c 65 6e 67 74 68 7b 5c |    \set|length{\|
|00001240| 41 4e 40 61 7d 7b 5c 41 | 4e 40 78 5c 70 40 2d 5c |AN@a}{\A|N@x\p@-\|
|00001250| 41 4e 40 61 7d 25 0a 20 | 20 20 20 20 20 20 20 20 |AN@a}%. |        |
|00001260| 20 20 20 20 20 20 20 5c | 64 72 61 77 6c 69 6e 65 |       \|drawline|
|00001270| 28 5c 41 4e 40 58 70 6f | 73 2c 5c 41 4e 40 59 70 |(\AN@Xpo|s,\AN@Yp|
|00001280| 6f 73 29 28 5c 41 4e 40 | 78 2c 30 29 25 0a 20 20 |os)(\AN@|x,0)%.  |
|00001290| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 5c 73 |        |      \s|
|000012a0| 65 74 6c 65 6e 67 74 68 | 7b 5c 41 4e 40 61 7d 7b |etlength|{\AN@a}{|
|000012b0| 5c 41 4e 65 73 65 70 2a | 5c 72 61 74 69 6f 7b 5c |\ANesep*|\ratio{\|
|000012c0| 41 4e 40 78 5c 70 40 2d | 5c 41 4e 40 6e 6f 64 65 |AN@x\p@-|\AN@node|
|000012d0| 78 5c 70 40 7d 7b 5c 41 | 4e 40 6e 6f 64 65 79 5c |x\p@}{\A|N@nodey\|
|000012e0| 70 40 7d 2b 28 5c 41 4e | 40 65 68 73 70 29 7d 25 |p@}+(\AN|@ehsp)}%|
|000012f0| 0a 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.       |        |
|00001300| 20 5c 73 65 74 6c 65 6e | 67 74 68 7b 5c 41 4e 40 | \setlen|gth{\AN@|
|00001310| 62 7d 7b 5c 41 4e 40 61 | 2a 5c 72 61 74 69 6f 7b |b}{\AN@a|*\ratio{|
|00001320| 5c 41 4e 40 6e 6f 64 65 | 79 5c 70 40 7d 7b 5c 41 |\AN@node|y\p@}{\A|
|00001330| 4e 40 78 5c 70 40 2d 5c | 41 4e 40 6e 6f 64 65 78 |N@x\p@-\|AN@nodex|
|00001340| 5c 70 40 7d 7d 25 0a 20 | 20 20 20 20 20 20 20 20 |\p@}}%. |        |
|00001350| 20 20 20 20 20 20 20 5c | 73 65 74 6c 65 6e 67 74 |       \|setlengt|
|00001360| 68 7b 5c 41 4e 40 61 7d | 7b 5c 41 4e 40 78 5c 70 |h{\AN@a}|{\AN@x\p|
|00001370| 40 2d 5c 41 4e 40 61 7d | 25 0a 20 20 20 20 20 20 |@-\AN@a}|%.      |
|00001380| 20 20 20 20 20 20 20 20 | 20 20 5c 64 72 61 77 6c |        |  \drawl|
|00001390| 69 6e 65 28 5c 41 4e 40 | 58 70 6f 73 2c 5c 41 4e |ine(\AN@|Xpos,\AN|
|000013a0| 40 59 70 6f 73 29 28 5c | 41 4e 40 6e 6f 64 65 78 |@Ypos)(\|AN@nodex|
|000013b0| 2c 5c 41 4e 40 6e 6f 64 | 65 79 29 25 0a 20 20 20 |,\AN@nod|ey)%.   |
|000013c0| 20 20 20 20 20 20 20 20 | 20 20 20 7d 25 0a 20 20 |        |   }%.  |
|000013d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 5c 73 65 74 |        |    \set|
|000013e0| 6c 65 6e 67 74 68 7b 5c | 41 4e 40 61 7d 7b 5c 41 |length{\|AN@a}{\A|
|000013f0| 4e 40 78 5c 70 40 2d 5c | 41 4e 65 73 65 70 2a 5c |N@x\p@-\|ANesep*\|
|00001400| 72 61 74 69 6f 7b 5c 41 | 4e 40 78 5c 70 40 2d 5c |ratio{\A|N@x\p@-\|
|00001410| 41 4e 40 6e 6f 64 65 78 | 5c 70 40 7d 7b 5c 41 4e |AN@nodex|\p@}{\AN|
|00001420| 40 6e 6f 64 65 79 5c 70 | 40 7d 7d 25 0a 20 20 20 |@nodey\p|@}}%.   |
|00001430| 20 20 20 20 20 20 20 20 | 20 7d 7b 25 0a 20 20 20 |        | }{%.   |
|00001440| 20 20 20 20 20 20 20 20 | 20 20 20 5c 73 65 74 6c |        |   \setl|
|00001450| 65 6e 67 74 68 7b 5c 41 | 4e 40 61 7d 7b 31 30 30 |ength{\A|N@a}{100|
|00001460| 70 74 2a 5c 72 61 74 69 | 6f 7b 5c 41 4e 40 6e 6f |pt*\rati|o{\AN@no|
|00001470| 64 65 78 5c 70 40 2d 5c | 41 4e 40 78 5c 70 40 7d |dex\p@-\|AN@x\p@}|
|00001480| 7b 5c 41 4e 40 6e 6f 64 | 65 79 5c 70 40 7d 7d 25 |{\AN@nod|ey\p@}}%|
|00001490| 0a 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 5c |.       |       \|
|000014a0| 69 66 74 68 65 6e 65 6c | 73 65 7b 5c 6c 65 6e 67 |ifthenel|se{\leng|
|000014b0| 74 68 74 65 73 74 7b 5c | 41 4e 40 61 20 3c 20 5c |thtest{\|AN@a < \|
|000014c0| 41 4e 40 63 7d 7d 7b 25 | 0a 20 20 20 20 20 20 20 |AN@c}}{%|.       |
|000014d0| 20 20 20 20 20 20 20 20 | 20 5c 73 65 74 6c 65 6e |        | \setlen|
|000014e0| 67 74 68 7b 5c 41 4e 40 | 62 7d 7b 5c 41 4e 65 73 |gth{\AN@|b}{\ANes|
|000014f0| 65 70 2d 5c 41 4e 40 65 | 76 73 70 7d 25 0a 20 20 |ep-\AN@e|vsp}%.  |
|00001500| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 5c 73 |        |      \s|
|00001510| 65 74 6c 65 6e 67 74 68 | 7b 5c 41 4e 40 61 7d 7b |etlength|{\AN@a}{|
|00001520| 5c 41 4e 40 78 5c 70 40 | 2b 5c 41 4e 40 62 2a 5c |\AN@x\p@|+\AN@b*\|
|00001530| 72 61 74 69 6f 7b 5c 41 | 4e 40 6e 6f 64 65 78 5c |ratio{\A|N@nodex\|
|00001540| 70 40 2d 5c 41 4e 40 78 | 5c 70 40 7d 7b 5c 41 4e |p@-\AN@x|\p@}{\AN|
|00001550| 40 6e 6f 64 65 79 5c 70 | 40 7d 7d 25 0a 20 20 20 |@nodey\p|@}}%.   |
|00001560| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 5c 64 72 |        |     \dr|
|00001570| 61 77 6c 69 6e 65 28 5c | 41 4e 40 58 70 6f 73 2c |awline(\|AN@Xpos,|
|00001580| 5c 41 4e 40 59 70 6f 73 | 29 28 5c 41 4e 40 78 2c |\AN@Ypos|)(\AN@x,|
|00001590| 30 29 25 0a 20 20 20 20 | 20 20 20 20 20 20 20 20 |0)%.    |        |
|000015a0| 20 20 20 20 5c 73 65 74 | 6c 65 6e 67 74 68 7b 5c |    \set|length{\|
|000015b0| 41 4e 40 62 7d 7b 5c 41 | 4e 65 73 65 70 2b 5c 41 |AN@b}{\A|Nesep+\A|
|000015c0| 4e 40 65 76 73 70 7d 25 | 0a 20 20 20 20 20 20 20 |N@evsp}%|.       |
|000015d0| 20 20 20 20 20 20 20 20 | 20 5c 73 65 74 6c 65 6e |        | \setlen|
|000015e0| 67 74 68 7b 5c 41 4e 40 | 61 7d 7b 5c 41 4e 40 78 |gth{\AN@|a}{\AN@x|
|000015f0| 5c 70 40 2b 5c 41 4e 40 | 62 2a 5c 72 61 74 69 6f |\p@+\AN@|b*\ratio|
|00001600| 7b 5c 41 4e 40 6e 6f 64 | 65 78 5c 70 40 2d 5c 41 |{\AN@nod|ex\p@-\A|
|00001610| 4e 40 78 5c 70 40 7d 7b | 5c 41 4e 40 6e 6f 64 65 |N@x\p@}{|\AN@node|
|00001620| 79 5c 70 40 7d 7d 25 0a | 20 20 20 20 20 20 20 20 |y\p@}}%.|        |
|00001630| 20 20 20 20 20 20 20 20 | 5c 64 72 61 77 6c 69 6e |        |\drawlin|
|00001640| 65 28 5c 41 4e 40 58 70 | 6f 73 2c 5c 41 4e 40 59 |e(\AN@Xp|os,\AN@Y|
|00001650| 70 6f 73 29 28 5c 41 4e | 40 6e 6f 64 65 78 2c 5c |pos)(\AN|@nodex,\|
|00001660| 41 4e 40 6e 6f 64 65 79 | 29 25 0a 20 20 20 20 20 |AN@nodey|)%.     |
|00001670| 20 20 20 20 20 20 20 20 | 20 7d 7b 25 0a 20 20 20 |        | }{%.   |
|00001680| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 5c 73 65 |        |     \se|
|00001690| 74 6c 65 6e 67 74 68 7b | 5c 41 4e 40 61 7d 7b 5c |tlength{|\AN@a}{\|
|000016a0| 41 4e 65 73 65 70 2a 5c | 72 61 74 69 6f 7b 5c 41 |ANesep*\|ratio{\A|
|000016b0| 4e 40 6e 6f 64 65 78 5c | 70 40 2d 5c 41 4e 40 78 |N@nodex\|p@-\AN@x|
|000016c0| 5c 70 40 7d 7b 5c 41 4e | 40 6e 6f 64 65 79 5c 70 |\p@}{\AN|@nodey\p|
|000016d0| 40 7d 2d 28 5c 41 4e 40 | 65 68 73 70 29 7d 25 0a |@}-(\AN@|ehsp)}%.|
|000016e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000016f0| 5c 73 65 74 6c 65 6e 67 | 74 68 7b 5c 41 4e 40 62 |\setleng|th{\AN@b|
|00001700| 7d 7b 5c 41 4e 40 61 2a | 5c 72 61 74 69 6f 7b 5c |}{\AN@a*|\ratio{\|
|00001710| 41 4e 40 6e 6f 64 65 79 | 5c 70 40 7d 7b 5c 41 4e |AN@nodey|\p@}{\AN|
|00001720| 40 6e 6f 64 65 78 5c 70 | 40 2d 5c 41 4e 40 78 5c |@nodex\p|@-\AN@x\|
|00001730| 70 40 7d 7d 25 0a 20 20 | 20 20 20 20 20 20 20 20 |p@}}%.  |        |
|00001740| 20 20 20 20 20 20 5c 73 | 65 74 6c 65 6e 67 74 68 |      \s|etlength|
|00001750| 7b 5c 41 4e 40 61 7d 7b | 5c 41 4e 40 78 5c 70 40 |{\AN@a}{|\AN@x\p@|
|00001760| 2b 5c 41 4e 40 61 7d 25 | 0a 20 20 20 20 20 20 20 |+\AN@a}%|.       |
|00001770| 20 20 20 20 20 20 20 20 | 20 5c 64 72 61 77 6c 69 |        | \drawli|
|00001780| 6e 65 28 5c 41 4e 40 58 | 70 6f 73 2c 5c 41 4e 40 |ne(\AN@X|pos,\AN@|
|00001790| 59 70 6f 73 29 28 5c 41 | 4e 40 78 2c 30 29 25 0a |Ypos)(\A|N@x,0)%.|
|000017a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000017b0| 5c 73 65 74 6c 65 6e 67 | 74 68 7b 5c 41 4e 40 61 |\setleng|th{\AN@a|
|000017c0| 7d 7b 5c 41 4e 65 73 65 | 70 2a 5c 72 61 74 69 6f |}{\ANese|p*\ratio|
|000017d0| 7b 5c 41 4e 40 6e 6f 64 | 65 78 5c 70 40 2d 5c 41 |{\AN@nod|ex\p@-\A|
|000017e0| 4e 40 78 5c 70 40 7d 7b | 5c 41 4e 40 6e 6f 64 65 |N@x\p@}{|\AN@node|
|000017f0| 79 5c 70 40 7d 2b 28 5c | 41 4e 40 65 68 73 70 29 |y\p@}+(\|AN@ehsp)|
|00001800| 7d 25 0a 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |}%.     |        |
|00001810| 20 20 20 5c 73 65 74 6c | 65 6e 67 74 68 7b 5c 41 |   \setl|ength{\A|
|00001820| 4e 40 62 7d 7b 5c 41 4e | 40 61 2a 5c 72 61 74 69 |N@b}{\AN|@a*\rati|
|00001830| 6f 7b 5c 41 4e 40 6e 6f | 64 65 79 5c 70 40 7d 7b |o{\AN@no|dey\p@}{|
|00001840| 5c 41 4e 40 6e 6f 64 65 | 78 5c 70 40 2d 5c 41 4e |\AN@node|x\p@-\AN|
|00001850| 40 78 5c 70 40 7d 7d 25 | 0a 20 20 20 20 20 20 20 |@x\p@}}%|.       |
|00001860| 20 20 20 20 20 20 20 20 | 20 5c 73 65 74 6c 65 6e |        | \setlen|
|00001870| 67 74 68 7b 5c 41 4e 40 | 61 7d 7b 5c 41 4e 40 78 |gth{\AN@|a}{\AN@x|
|00001880| 5c 70 40 2b 5c 41 4e 40 | 61 7d 25 0a 20 20 20 20 |\p@+\AN@|a}%.    |
|00001890| 20 20 20 20 20 20 20 20 | 20 20 20 20 5c 64 72 61 |        |    \dra|
|000018a0| 77 6c 69 6e 65 28 5c 41 | 4e 40 58 70 6f 73 2c 5c |wline(\A|N@Xpos,\|
|000018b0| 41 4e 40 59 70 6f 73 29 | 28 5c 41 4e 40 6e 6f 64 |AN@Ypos)|(\AN@nod|
|000018c0| 65 78 2c 5c 41 4e 40 6e | 6f 64 65 79 29 25 0a 20 |ex,\AN@n|odey)%. |
|000018d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 7d 25 0a |        |     }%.|
|000018e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 5c 73 |        |      \s|
|000018f0| 65 74 6c 65 6e 67 74 68 | 7b 5c 41 4e 40 61 7d 7b |etlength|{\AN@a}{|
|00001900| 5c 41 4e 40 78 5c 70 40 | 2b 5c 41 4e 65 73 65 70 |\AN@x\p@|+\ANesep|
|00001910| 2a 5c 72 61 74 69 6f 7b | 5c 41 4e 40 6e 6f 64 65 |*\ratio{|\AN@node|
|00001920| 78 5c 70 40 2d 5c 41 4e | 40 78 5c 70 40 7d 7b 5c |x\p@-\AN|@x\p@}{\|
|00001930| 41 4e 40 6e 6f 64 65 79 | 5c 70 40 7d 7d 25 0a 20 |AN@nodey|\p@}}%. |
|00001940| 20 20 20 20 20 20 20 20 | 20 20 20 7d 25 0a 20 20 |        |   }%.  |
|00001950| 20 20 20 20 20 20 20 20 | 7d 25 0a 20 20 20 20 20 |        |}%.     |
|00001960| 20 20 20 20 20 5c 70 75 | 74 28 5c 41 4e 40 58 70 |     \pu|t(\AN@Xp|
|00001970| 6f 73 2c 5c 65 78 70 61 | 6e 64 61 66 74 65 72 5c |os,\expa|ndafter\|
|00001980| 41 4e 40 72 6d 64 5c 74 | 68 65 5c 41 4e 65 73 65 |AN@rmd\t|he\ANese|
|00001990| 70 29 7b 5c 6d 61 6b 65 | 62 6f 78 28 30 2c 30 29 |p){\make|box(0,0)|
|000019a0| 7b 5c 41 4e 40 65 6c 61 | 62 65 6c 7d 7d 25 0a 20 |{\AN@ela|bel}}%. |
|000019b0| 20 20 20 20 20 20 20 7d | 25 0a 20 20 20 20 20 20 |       }|%.      |
|000019c0| 7d 25 0a 20 20 20 20 7d | 25 0a 20 20 20 20 5c 70 |}%.    }|%.    \p|
|000019d0| 75 74 28 5c 41 4e 40 6e | 6f 64 65 78 2c 5c 41 4e |ut(\AN@n|odex,\AN|
|000019e0| 40 6e 6f 64 65 79 29 7b | 5c 6d 61 6b 65 62 6f 78 |@nodey){|\makebox|
|000019f0| 28 30 2c 30 29 5b 62 63 | 5d 7b 5c 75 73 65 62 6f |(0,0)[bc|]{\usebo|
|00001a00| 78 7b 5c 6e 6f 64 65 40 | 63 6f 6e 74 65 6e 74 7d |x{\node@|content}|
|00001a10| 7d 7d 25 0a 20 20 5c 65 | 6e 64 7b 70 69 63 74 75 |}}%.  \e|nd{pictu|
|00001a20| 72 65 7d 25 0a 20 20 5c | 65 67 72 6f 75 70 25 0a |re}%.  \|egroup%.|
|00001a30| 7d 0a 5c 62 65 67 69 6e | 7b 74 61 62 75 6c 61 72 |}.\begin|{tabular|
|00001a40| 7d 5b 74 5d 7b 63 7d 5c | 62 65 67 69 6e 7b 6e 6f |}[t]{c}\|begin{no|
|00001a50| 64 65 7d 5b 23 31 5d 7b | 23 32 7d 7d 0a 7b 5c 65 |de}[#1]{|#2}}.{\e|
|00001a60| 6e 64 7b 6e 6f 64 65 7d | 5c 65 6e 64 7b 74 61 62 |nd{node}|\end{tab|
|00001a70| 75 6c 61 72 7d 7d 0a 0a | 5c 65 6e 64 6c 69 6e 65 |ular}}..|\endline|
|00001a80| 63 68 61 72 3d 31 33 5c | 72 65 6c 61 78 0a 0a 5c |char=13\|relax..\|
|00001a90| 65 6e 64 69 6e 70 75 74 | 0a                      |endinput|.       |
+--------+-------------------------+-------------------------+--------+--------+